Public Class clsComboSource
#Region " CLASS MEMBER VARIABLES "
  Private mObjTableId As Integer
  Private mObjTableName As String
#End Region

#Region " CLASS MEMBER PROPERTIES "
  Public Property mPrpDisplayMember() As String
    Get
      Return mObjTableName
    End Get
    Set(ByVal value As String)
      mObjTableName = value
    End Set
  End Property

  Public Property mPrpValueMember() As Integer
    Get
      Return mObjTableId
    End Get
    Set(ByVal value As Integer)
      mObjTableId = value
    End Set
  End Property
#End Region

End Class
